home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 2004 #11 / Amiga Plus CD - 2004 - No. 11.iso / AmiSoft / Comm / mail / SpamFryer.lha / SpamFryer / YAM Support / rexx / MiamiOnline.yam next >
Text File  |  2004-07-18  |  456b  |  21 lines
  1. MiamiPath = "WORK:COMMS/MIAMI/Miami"  /* Change this if required */
  2. SpamPath = "work:comms/SpamFryer/SpamFryer.rexx" /* Add this line */
  3.  
  4. OPTIONS RESULTS
  5. IF ~SHOW('P', 'MIAMI.1') THEN DO
  6.    ADDRESS COMMAND
  7.    'Run <>NIL:' miamiPath
  8.    'WaitForPort MIAMI.1'
  9. END
  10. ADDRESS 'MIAMI.1'
  11. ISONLINE
  12. IF RC=0 THEN ONLINE
  13. ISONLINE
  14. IF RC=0 THEN EXIT 5
  15. HIDE
  16.    ADDRESS COMMAND  /* Added for SpamFryer by Kelvin Graham */
  17.    'rx' SpamPath
  18.     'wait 10'
  19.     'endcli'
  20. EXIT 0
  21.